inherited FPesquisaMovimentoFinanceiroCentroCusto: TFPesquisaMovimentoFinanceiroCentroCusto
  Left = 290
  Top = 261
  Caption = 'Pesquisa Movimento Financeiro Centro de Custo'
  ClientHeight = 206
  ClientWidth = 414
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    Width = 414
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      Tag = 5
      Left = 409
      Enabled = False
      Visible = False
    end
    inherited BtnFechar: TBitBtn
      Left = 245
    end
  end
  inherited Panel1: TPanel
    Width = 414
    Height = 165
    object Label3: TLabel [0]
      Left = 205
      Top = 0
      Width = 114
      Height = 13
      Caption = 'Classifica'#231#227'o Financeira'
    end
    object Label9: TLabel [1]
      Left = 5
      Top = 38
      Width = 38
      Height = 13
      Caption = 'Per'#237'odo'
    end
    object Label6: TLabel [2]
      Left = 94
      Top = 54
      Width = 6
      Height = 13
      Caption = 'a'
    end
    object Label1: TLabel [3]
      Left = 5
      Top = 0
      Width = 28
      Height = 13
      Caption = 'Conta'
    end
    object Label10: TLabel [4]
      Left = 5
      Top = 89
      Width = 46
      Height = 13
      Caption = 'Empresas'
    end
    object SpeedButton1: TSpeedButton [5]
      Tag = 1
      Left = 385
      Top = 13
      Width = 21
      Height = 20
      Caption = '-->'
      OnClick = SpeedButton1Click
    end
    object Label16: TLabel [6]
      Left = 207
      Top = 36
      Width = 76
      Height = 13
      Caption = 'Centro de Custo'
    end
    object SpeedButton3: TSpeedButton [7]
      Tag = 1
      Left = 385
      Top = 49
      Width = 21
      Height = 20
      Caption = '-->'
      OnClick = SpeedButton3Click
    end
    inherited DBGrid1: TDBGrid
      Top = 428
      Width = 556
      Height = 85
      Align = alNone
      Enabled = False
      TabOrder = 5
      Columns = <
        item
          Expanded = False
          FieldName = 'CONTA'
          Title.Caption = 'Conta'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCRICAO'
          Title.Caption = 'Classifica'#231#227'o Financeira'
          Width = 127
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCRICAOCENTRO'
          Title.Caption = 'Centro de Custo'
          Width = 105
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LANCAMENTO'
          Title.Caption = 'Lan'#231'amento'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATA'
          Title.Caption = 'Data'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DOCUMENTO'
          Title.Caption = 'Documento'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'HISTORICO'
          Title.Caption = 'Hist'#243'rico'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CHEQUE'
          Title.Caption = 'Cheque'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALOR'
          Title.Caption = 'Valor'
          Visible = True
        end>
    end
    inherited Panel3: TPanel
      Top = 144
      Width = 412
      TabOrder = 6
    end
    object DEDataIni: TDateEdit
      Left = 5
      Top = 51
      Width = 88
      Height = 21
      NumGlyphs = 2
      TabOrder = 1
    end
    object DEDataFim: TDateEdit
      Left = 109
      Top = 50
      Width = 88
      Height = 21
      NumGlyphs = 2
      TabOrder = 2
    end
    object DBLCBConta: TDBLookupComboBox
      Left = 5
      Top = 15
      Width = 197
      Height = 21
      KeyField = 'CONT_CORR_CODIGO'
      ListField = 'CONT_CORR_DESCRICAO'
      ListSource = DSConta
      TabOrder = 0
      OnKeyDown = DBLCBContaKeyDown
    end
    object CkBTodasEmpresas: TCheckBox
      Left = 5
      Top = 74
      Width = 118
      Height = 13
      Caption = 'Todas as Empresas'
      TabOrder = 3
      OnClick = CkBTodasEmpresasClick
    end
    object CLBEmpresas: TCheckListBox
      Left = 1
      Top = 104
      Width = 412
      Height = 40
      Align = alBottom
      Columns = 1
      ItemHeight = 13
      TabOrder = 4
    end
    object DBLCBPlano: TDBLookupComboBox
      Left = 205
      Top = 14
      Width = 180
      Height = 21
      DataField = 'LANC_PLANO'
      KeyField = 'CODIGO'
      ListField = 'DESCRICAO'
      ListSource = DSPlano
      TabOrder = 7
      OnKeyDown = DBLCBContaKeyDown
    end
    object DBLCBCentroCusto: TDBLookupComboBox
      Left = 207
      Top = 50
      Width = 180
      Height = 21
      KeyField = 'CODIGO'
      ListField = 'DESCRICAO'
      ListSource = DSCentro
      TabOrder = 8
      OnKeyDown = DBLCBContaKeyDown
    end
  end
  inherited QPesquisa: TQuery
    SQL.Strings = (
      
        'Select CentroCusto.estrutura as estruturaCentro,CentroCusto.Desc' +
        'ricao as DescricaoCentro,PlanoContas.estrutura as estrutura,Plan' +
        'oContas.Descricao as Descricao,PlanoContas.natureza as Natureza,' +
        'Cont_Corr_Descricao as Conta,'
      
        'Lanc_Codigo as lancamento,Lanc_Data as data, Lanc_Documento as D' +
        'ocumento, lanc_Cheque as Cheque,sum(Lanc_Valor) as Valor,Lanc_Pl' +
        'anoJurosMulta as PlanoJurosMulta,Lanc_PlanoDesconto as PlanoDesc' +
        'onto,'
      'Lanc_JurosMulta as JurosMulta'
      
        'From CentroCusto Right join (PlanoContas Inner join (Lancamento ' +
        'Inner join ContaCorrente on  Lanc_Conta =Cont_Corr_Codigo) on Pl' +
        'anoContas.Codigo = Lanc_Plano ) On CentroCusto.Codigo = Lanc_Cen' +
        'trocusto '
      ''
      
        'Group By CentroCusto.estrutura,CentroCusto.Descricao,PlanoContas' +
        '.estrutura ,PlanoContas.Descricao, Cont_Corr_Descricao,PlanoCont' +
        'as.natureza, Lanc_Codigo,Lanc_Data, Lanc_Documento,lanc_Cheque,L' +
        'anc_PlanoJurosMulta,'
      'Lanc_PlanoDesconto,Lanc_JurosMulta'
      ''
      '')
    Left = 224
    Top = 217
  end
  inherited DSPesquisa: TDataSource
    Left = 256
    Top = 217
  end
  object DSConta: TDataSource
    DataSet = DMFinanceiro.QConta
    Left = 160
    Top = 57
  end
  object QMovimentoFinanceiro: TQuery
    DatabaseName = 'baseLocal'
    RequestLive = True
    SQL.Strings = (
      'Select * from MovimentoFinanceiro')
    Left = 48
    Top = 144
  end
  object QAux: TQuery
    DatabaseName = 'base'
    Left = 128
    Top = 144
  end
  object QAux2: TQuery
    DatabaseName = 'baseLocal'
    Left = 88
    Top = 144
  end
  object DSPlano: TDataSource
    DataSet = DMFinanceiro.QPlano
    Left = 352
    Top = 56
  end
  object DSCentro: TDataSource
    DataSet = DMFinanceiro.QCentro
    Left = 312
    Top = 88
  end
end
